﻿Imports System.Collections.Generic
Imports System.Linq
Partial Class ValidateEmail
    Inherits System.Web.UI.Page

    Protected Sub Page_Init(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Init


        Dim id As String = Trim(Request.QueryString("id").ToString())
        Dim custid As Integer = OneCall.Crypt.Decrypt(id, "1CallH0meCar3")
        Dim SQLDB As New OneCall.DataModel.OneCDataEntities
        Dim customers As OneCall.DataModel.Customer = (From p In SQLDB.Customers Where p.Customer_ID = custid).ToArray()(0)

        UserFullName.Text = customers.Customer_FirstName & " " & customers.Customer_LastName
        OneCall.SMSGateway.SMS.SendSMS(customers.Customer_FirstName & " " & customers.Customer_LastName & ", OneCallhomeCareSolution welcomes you, your account has been verified, our executive will get in touch with you shortly", customers.Customer_Mobile)

        customers = Nothing
        SQLDB.Dispose()

    End Sub
End Class
